inherited frmTd_Depot_Edit: TfrmTd_Depot_Edit
  Left = 484
  Top = 186
  BorderIcons = [biSystemMenu]
  Caption = #20179#24211#36164#26009
  ClientHeight = 376
  ClientWidth = 579
  ExplicitWidth = 587
  ExplicitHeight = 403
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel [0]
    Left = 92
    Top = 17
    Width = 60
    Height = 12
    Caption = #20179#24211#21517#31216#65306
    Transparent = True
  end
  object lblCode: TLabel [1]
    Left = 92
    Top = 46
    Width = 60
    Height = 12
    Caption = #20179#24211#32534#30721#65306
    Transparent = True
  end
  object Label3: TLabel [2]
    Left = 92
    Top = 75
    Width = 60
    Height = 12
    Caption = #20179#24211#20301#32622#65306
    Transparent = True
  end
  object Label4: TLabel [3]
    Left = 92
    Top = 219
    Width = 60
    Height = 12
    Caption = #22791'    '#27880#65306
    Transparent = True
  end
  object dynlblFilid: TLabel [4]
    Left = 92
    Top = 188
    Width = 60
    Height = 12
    Caption = #20998#25903#26426#26500#65306
    Transparent = True
  end
  object Label5: TLabel [5]
    Left = 92
    Top = 159
    Width = 60
    Height = 12
    Caption = #22320'    '#21306#65306
    Transparent = True
  end
  object Label6: TLabel [6]
    Left = 92
    Top = 104
    Width = 60
    Height = 12
    Caption = #30005'    '#35805#65306
    Transparent = True
  end
  object Label7: TLabel [7]
    Left = 340
    Top = 159
    Width = 60
    Height = 12
    Caption = #24635' '#23481' '#37327#65306
    Transparent = True
  end
  object lblRooms: TLabel [8]
    Left = 340
    Top = 188
    Width = 60
    Height = 12
    Caption = #24211' '#25151' '#25968#65306
    Transparent = True
  end
  object Label2: TLabel [9]
    Left = 92
    Top = 132
    Width = 60
    Height = 12
    Caption = #36127' '#36131' '#20154#65306
    Transparent = True
  end
  inherited pnlBottom: TPanel
    Top = 316
    Width = 579
    TabOrder = 11
    ExplicitTop = 316
    ExplicitWidth = 579
    inherited Bevel1: TBevel
      Width = 579
      ExplicitWidth = 505
    end
    inherited btnOK: TBitBtn
      Left = 386
      Top = 20
      ExplicitLeft = 386
      ExplicitTop = 20
    end
    inherited btnCancel: TBitBtn
      Left = 481
      Top = 20
      ExplicitLeft = 481
      ExplicitTop = 20
    end
    inherited btnContinue: TBitBtn
      Top = 20
      ExplicitTop = 20
    end
    inherited btnPri: TBitBtn
      Top = 20
      ExplicitTop = 20
    end
    inherited btnNext: TBitBtn
      Left = 193
      Top = 20
      ExplicitLeft = 193
      ExplicitTop = 20
    end
    inherited btnBaseEditSave: TBitBtn
      Top = 20
      ExplicitTop = 20
    end
  end
  object EdtName: TcxDBTextEdit [11]
    Left = 157
    Top = 12
    DataBinding.DataField = 'name'
    DataBinding.DataSource = MainDataSource
    TabOrder = 0
    Width = 175
  end
  object EdtCode: TcxDBTextEdit [12]
    Left = 157
    Top = 41
    DataBinding.DataField = 'code'
    DataBinding.DataSource = MainDataSource
    TabOrder = 15
    Width = 175
  end
  object EdtPlace: TcxDBTextEdit [13]
    Left = 157
    Top = 70
    DataBinding.DataField = 'place'
    DataBinding.DataSource = MainDataSource
    TabOrder = 16
    Width = 175
  end
  object EdtExplan: TcxDBTextEdit [14]
    Left = 157
    Top = 214
    DataBinding.DataField = 'explan'
    DataBinding.DataSource = MainDataSource
    TabOrder = 6
    Width = 300
  end
  object dynedtFilid: TcxDBLookupComboBox [15]
    Tag = 5
    Left = 157
    Top = 184
    DataBinding.DataField = 'filid'
    DataBinding.DataSource = MainDataSource
    Properties.ListColumns = <>
    Properties.ListOptions.SyncMode = True
    TabOrder = 4
    Width = 175
  end
  object chkPause: TcxDBCheckBox [16]
    Left = 88
    Top = 279
    Caption = #20572#29992#26631#24535
    DataBinding.DataField = 'pause'
    DataBinding.DataSource = MainDataSource
    Properties.NullStyle = nssUnchecked
    TabOrder = 8
    Transparent = True
    OnClick = chkPauseClick
  end
  inline fraEditShare1: TfraEditShare [17]
    Left = 76
    Top = 244
    Width = 353
    Height = 32
    TabOrder = 7
    ExplicitLeft = 76
    ExplicitTop = 244
    ExplicitWidth = 353
    ExplicitHeight = 32
    inherited Label6: TLabel
      Left = 16
      Top = 9
      Width = 60
      Height = 12
      ExplicitLeft = 16
      ExplicitTop = 9
      ExplicitWidth = 60
      ExplicitHeight = 12
    end
    inherited BtnAdd: TButton
      Left = 233
      Top = 5
      OnClick = fraEditShare1BtnAddClick
      ExplicitLeft = 233
      ExplicitTop = 5
    end
    inherited EdtUsers: TcxTextEdit
      Left = 81
      ExplicitLeft = 81
      ExplicitHeight = 20
    end
    inherited Qry_Userinfo: TUniQuery
      Left = 259
      Top = 2
    end
    inherited MainDataSource: TDataSource
      Left = 287
    end
  end
  object cxDBCheckBox2: TcxDBCheckBox [18]
    Left = 184
    Top = 279
    Caption = 'DRP'#21487#29992
    DataBinding.DataField = 'drp'
    DataBinding.DataSource = MainDataSource
    Properties.NullStyle = nssUnchecked
    TabOrder = 9
    Transparent = True
  end
  object chkMRP: TcxDBCheckBox [19]
    Left = 282
    Top = 279
    Caption = 'MRP'#21487#29992
    DataBinding.DataField = 'mrp'
    DataBinding.DataSource = MainDataSource
    Properties.NullStyle = nssUnchecked
    TabOrder = 10
    Transparent = True
  end
  object dynedtAreaID: TcxDBLookupComboBox [20]
    Tag = 37
    Left = 157
    Top = 155
    DataBinding.DataField = 'areaid'
    DataBinding.DataSource = MainDataSource
    Properties.ListColumns = <>
    Properties.ListOptions.SyncMode = True
    TabOrder = 5
    Width = 175
  end
  object edtTel: TcxDBTextEdit [21]
    Left = 157
    Top = 99
    DataBinding.DataField = 'tel'
    DataBinding.DataSource = MainDataSource
    TabOrder = 3
    Width = 175
  end
  object edtRooms: TcxDBSpinEdit [22]
    Left = 397
    Top = 184
    DataBinding.DataField = 'rooms'
    DataBinding.DataSource = MainDataSource
    Properties.MinValue = 1.000000000000000000
    TabOrder = 12
    Width = 60
  end
  object edtGross: TcxDBCurrencyEdit [23]
    Left = 397
    Top = 155
    DataBinding.DataField = 'gross'
    DataBinding.DataSource = MainDataSource
    TabOrder = 13
    Width = 60
  end
  object edtManager: TcxDBTextEdit [24]
    Left = 157
    Top = 127
    DataBinding.DataField = 'manager'
    DataBinding.DataSource = MainDataSource
    TabOrder = 14
    Width = 175
  end
  inherited btnPrint: TcxButton [25]
  end
  inherited edtPrint: TcxLookupComboBox [26]
  end
  inherited MainDataSource: TDataSource [27]
    DataSet = MainDataSet
    Left = 24
    Top = 52
  end
  inherited qryDynDtl: TUniQuery [28]
    Left = 25
    Top = 168
  end
  inherited pmPrint: TPopupMenu [29]
  end
  inherited qryReportDtl: TUniQuery [30]
  end
  inherited dsReportDtl: TDataSource [31]
  end
  object MainDataSet: TUniQuery
    SQLInsert.Strings = (
      'Insert into TD_DEPOT(depotid,'
      'code,'
      'name,'
      'place,'
      'filid,'
      'areaid,'
      'drp,'
      'mrp,'
      'pause,'
      'userright,'
      'explan,'
      'create_by,'
      'create_time,'
      'update_by,'
      'update_time,'
      'gross,'
      'rooms,'
      'manager'
      ')'
      'Values'
      '(:depotid,'
      ':code,'
      ':name,'
      ':place,'
      ':filid,'
      ':areaid,'
      ':drp,'
      ':mrp,'
      ':pause,'
      ':userright,'
      ':explan,'
      ':create_by,'
      ':create_time,'
      ':update_by,'
      ':update_time,'
      ':gross,'
      ':rooms,'
      ':manager'
      ')')
    SQLDelete.Strings = (
      'delete td_depot where depotid=:Old_depotid')
    SQLUpdate.Strings = (
      'Update TD_DEPOT set '
      'depotid=:depotid,'
      'code=:code,'
      'name=:name,'
      'place=:place,'
      'filid=:filid,'
      'areaid=:areaid,'
      'drp=:drp,'
      'mrp=:mrp,'
      'pause=:pause,'
      'userright=:userright,'
      'explan=:explan,'
      'create_by=:create_by,'
      'create_time=:create_time,'
      'update_by=:update_by,'
      'update_time=:update_time,'
      'gross=:gross,'
      'rooms=:rooms,'
      'manager=:manager'
      ' where depotid=:OLD_depotid')
    Connection = MainDM.UniConn
    SQL.Strings = (
      'select * from v_td_depot')
    CachedUpdates = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Left = 38
    Top = 96
    object MainDataSetdepotid: TIntegerField
      FieldName = 'depotid'
    end
    object MainDataSetcode: TStringField
      FieldName = 'code'
      Required = True
      Size = 30
    end
    object MainDataSetname: TWideStringField
      FieldName = 'name'
      Required = True
      Size = 60
    end
    object MainDataSetplace: TWideStringField
      FieldName = 'place'
      Size = 200
    end
    object MainDataSetfilid: TIntegerField
      FieldName = 'filid'
    end
    object MainDataSetdrp: TBooleanField
      FieldName = 'drp'
    end
    object MainDataSetpause: TBooleanField
      FieldName = 'pause'
    end
    object MainDataSetuserright: TStringField
      FieldName = 'userright'
      Size = 300
    end
    object MainDataSetexplan: TWideStringField
      FieldName = 'explan'
      Size = 200
    end
    object MainDataSetcreate_by: TIntegerField
      FieldName = 'create_by'
    end
    object MainDataSetupdate_by: TIntegerField
      FieldName = 'update_by'
    end
    object MainDataSetcreate_time: TDateTimeField
      FieldName = 'create_time'
    end
    object MainDataSetupdate_time: TDateTimeField
      FieldName = 'update_time'
    end
    object MainDataSetFI_FilNM: TStringField
      FieldName = 'FI_FilNM'
      ProviderFlags = [pfInWhere]
      Size = 60
    end
    object MainDataSetmrp: TBooleanField
      FieldName = 'mrp'
    end
    object MainDataSetareaid: TIntegerField
      FieldName = 'areaid'
    end
    object MainDataSetareaname: TWideStringField
      FieldName = 'areaname'
      ProviderFlags = [pfInWhere]
      Size = 60
    end
    object MainDataSettel: TWideStringField
      FieldName = 'tel'
    end
    object MainDataSetgross: TFloatField
      FieldName = 'gross'
    end
    object MainDataSetrooms: TIntegerField
      FieldName = 'rooms'
    end
    object MainDataSetmanager: TWideStringField
      FieldName = 'manager'
    end
  end
end
